From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 12 Apr 1993 07:54:16 +0000 (+0000)
Subject: (rot13-display-table): Use `vector', not `make-rope'.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96536
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=342df1e2476a934a46059fb947ddc2d9361f7b5e;p=emacs.git

(rot13-display-table): Use `vector', not `make-rope'.
---

diff --git a/lisp/rot13.el b/lisp/rot13.el
index 7c068bc1d81..d19a29db7dc 100644
--- a/lisp/rot13.el
+++ b/lisp/rot13.el
@@ -38,8 +38,8 @@
   (let ((table (make-display-table))
 	(i 0))
     (while (< i 26)
-      (aset table (+ i ?a) (make-rope (+ (% (+ i 13) 26) ?a)))
-      (aset table (+ i ?A) (make-rope (+ (% (+ i 13) 26) ?A)))
+      (aset table (+ i ?a) (vector (+ (% (+ i 13) 26) ?a)))
+      (aset table (+ i ?A) (vector (+ (% (+ i 13) 26) ?A)))
       (setq i (1+ i)))
     table)
   "Char table for rot 13 display.")